home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet multimedia / Animacje, filmy i prezentacje / Modelowanie 3D / K-3D 0.6.5.0 / k3d-all-in-one-setup-0.6.5.0.exe / k3d-setup-0.6.5.0.exe / share / lsystem / cees-plant-kwal.ls < prev    next >
Encoding:
Text File  |  2005-02-12  |  924 b   |  30 lines
  1. #╔═════════════════╤═══════════════════════════════╗
  2. #║ bekerplant.ls   │    (c) C.J. van der Mark      ║
  3. #╟─────────────────┴───────────────────────────────╢
  4. #║      Questions about Lparser files to:          ║
  5. #║        Internet  cvdmark@xs4all.nl              ║
  6. #║           Fido      2:283/203.11                ║
  7. #║           PCG       9:526/464.3                 ║
  8. #╚═════════════════════════════════════════════════╝
  9. 6
  10. 17
  11. 300
  12. Q
  13. Q=X>(45)X>(45)X>(45)X>(45)X>(45)X>(45)X>(45)X
  14. X=[c(2)FFFFFF&(30)c(2)FFAYZ]
  15. Y=[h+B[+EEEEEE[h+CiDiD][h-CiDiD]][h-EEEEEE[h+CiDiD][h-CiDiD]]]
  16. Z=[h-B[+EEEEEE[h+CiDiD][h-CiDiD]][h-EEEEEE[h+CiDiD][h-CiDiD]]]
  17. A=aEA
  18. B=EbEbB
  19. C=aGaGaGaGaGaGaGatGtGC
  20. D=bHD
  21. a=&(6)
  22. b=^(9)
  23. F=?(0.98)'(0.995)F
  24. h=~(6)
  25. i=?(0.94)i
  26. E=c(1)F[+(40)^(60)?(0.05)'(4)c(8)F][-(40)^(60)?(0.05)'(4)c(8)F]
  27. G=c(1)F[+(40)^(60)?(0.03)'(2)c(8)F][-(40)^(60)?(0.03)'(2)c(8)F]
  28. H=c(1)F[+(40)^(60)?(0.02)'(1)c(8)F][-(40)^(60)?(0.02)'(1)c(8)F]
  29. @
  30.